object main: Tmain Left = 351 Top = 223 Width = 440 Height = 406 Caption = 'The CrashCourse Installer' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop Position = poScreenCenter Visible = True OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Image1: TImage Left = 0 Top = 0 Width = 432 Height = 360 Align = alClient Picture.Data = {} Stretch = True end object var1: TLabel Left = 80 Top = 416 Width = 21 Height = 13 Caption = 'var1' Visible = False end object Label1: TLabel Left = 64 Top = 192 Width = 79 Height = 13 Caption = 'Source Directory' Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label3: TLabel Left = 64 Top = 240 Width = 98 Height = 13 Caption = 'Destination Directory' Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object title: TImage Left = 24 Top = 24 Width = 385 Height = 145 Stretch = True end object Label2: TLabel Left = 64 Top = 280 Width = 84 Height = 13 Caption = 'Start Menu Folder' Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label4: TLabel Left = 40 Top = 56 Width = 353 Height = 89 Alignment = taCenter AutoSize = False Font.Color = clWhite Font.Height = -33 Font.Name = 'Times New Roman' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label5: TLabel Left = 16 Top = 8 Width = 217 Height = 13 AutoSize = False Caption = 'Label5' Visible = False end object Label6: TLabel Left = 40 Top = 152 Width = 38 Height = 13 Caption = 'Version:' Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object Label7: TLabel Left = 88 Top = 152 Width = 21 Height = 13 Caption = '1.00' Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Transparent = True end object s: TEdit Left = 64 Top = 208 Width = 265 Height = 17 BorderStyle = bsNone Color = clWhite TabOrder = 0 Text = 's' end object d: TEdit Left = 64 Top = 256 Width = 265 Height = 17 BorderStyle = bsNone Color = clWhite TabOrder = 1 Text = 'd' end object Button2: TButton Left = 264 Top = 328 Width = 75 Height = 25 Caption = 'Install' TabOrder = 2 OnClick = Button2Click end object Button1: TButton Left = 352 Top = 328 Width = 75 Height = 25 Caption = 'Exit' TabOrder = 3 OnClick = Button1Click end object ini: TListBox Left = 216 Top = 384 Width = 121 Height = 97 ItemHeight = 13 TabOrder = 4 Visible = False end object StatusBar1: TStatusBar Left = 0 Top = 360 Width = 432 Height = 19 Panels = <> SimplePanel = False end object smenu: TComboBox Left = 64 Top = 296 Width = 265 Height = 21 Color = clWhite ItemHeight = 13 TabOrder = 6 end object smenubox: TFileListBox Left = 120 Top = 416 Width = 65 Height = 25 FileType = [ftDirectory] ItemHeight = 13 TabOrder = 7 Visible = False end object Button3: TButton Left = 8 Top = 328 Width = 75 Height = 25 Caption = 'About' TabOrder = 8 OnClick = Button3Click end object Button4: TButton Left = 344 Top = 200 Width = 49 Height = 25 Caption = 'Browse' TabOrder = 9 OnClick = Button4Click end object Button5: TButton Left = 344 Top = 248 Width = 49 Height = 25 Caption = 'Browse' TabOrder = 10 OnClick = Button5Click end end